home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
CD Fun House 1
/
CD Fun House (Wayzata Technology).iso
/
•The Simulator•
/
Pharaoh v1.0 •••••
/
Pharaoh
/
Pharaoh.rsrc
/
CODE_10.txt
< prev
next >
Wrap
Text File
|
1988-04-23
|
46KB
|
800 lines
# near model CODE resource
# jump table entries: 832-833 (2 of them)
export_104:
00000000 4E56 FFD0 link A6, -0x0030
00000004 48E7 0C00 movem.l -[A7], D4,D5
00000008 4267 clr.w -[A7]
0000000A 3F3C 0028 move.w -[A7], 0x28 /* '(' */
0000000E 486D F090 pea.l [A5 - 0xF70]
00000012 4EAD 03C2 jsr [A5 + 0x3C2 /* export_116 */]
00000016 504F addq.w A7, 8
00000018 45FA 0386 lea.l A2, [PC + 0x386 /* 000003A0, value 0x4E560000 'NV\0\0', cstring "NV" */]
0000001C 2B4A F094 move.l [A5 - 0xF6C], A2
00000020 45FA 039C lea.l A2, [PC + 0x39C /* 000003BE, value 0x4E56FFEC */]
00000024 2B4A F098 move.l [A5 - 0xF68], A2
00000028 45FA 06B8 lea.l A2, [PC + 0x6B8 /* 000006E2, value 0x4E560000 'NV\0\0', cstring "NV" */]
0000002C 2B4A F09C move.l [A5 - 0xF64], A2
00000030 45FA 06EA lea.l A2, [PC + 0x6EA /* 0000071C, value 0x4E56FFE8 */]
00000034 2B4A F0A0 move.l [A5 - 0xF60], A2
00000038 45ED F084 lea.l A2, [A5 - 0xF7C]
0000003C 43ED F12A lea.l A1, [A5 - 0xED6]
00000040 24D9 move.l [A2]+, [A1]+
00000042 24D9 move.l [A2]+, [A1]+
00000044 486D F084 pea.l [A5 - 0xF7C]
00000048 3F3C 003C move.w -[A7], 0x3C /* '<' */
0000004C 3F3C 0032 move.w -[A7], 0x32 /* '2' */
00000050 A8A9 syscall InsetRect
00000052 42A7 clr.l -[A7]
00000054 486D EFBC pea.l [A5 - 0x1044]
00000058 486D F084 pea.l [A5 - 0xF7C]
0000005C 487A 02DC pea.l [PC + 0x2DC /* 0000033A, value 0x11436C69, pstring "Click to Continue" */]
00000060 3F3C FFFF move.w -[A7], 0xFFFF
00000064 3F3C 0010 move.w -[A7], 0x10
00000068 2F3C FFFF FFFF move.l -[A7], 0xFFFFFFFF
0000006E 4267 clr.w -[A7]
00000070 486D F090 pea.l [A5 - 0xF70]
00000074 A913 syscall NewWindow
00000076 201F move.l D0, [A7]+
00000078 486D EFBC pea.l [A5 - 0x1044]
0000007C A873 syscall SetPort
0000007E 486D EFCC pea.l [A5 - 0x1034]
00000082 486D F17E pea.l [A5 - 0xE82]
00000086 A8A5 syscall FillRect
00000088 42A7 clr.l -[A7]
0000008A 2F3C 5049 4354 move.l -[A7], 0x50494354 /* 'PICT' */
00000090 3F3C 0200 move.w -[A7], 0x200
00000094 A9A0 syscall GetResource
00000096 201F move.l D0, [A7]+
00000098 2D40 FFD8 move.l [A6 - 0x28], D0
0000009C 45EE FFF8 lea.l A2, [A6 - 0x8]
000000A0 226E FFD8 movea.l A1, [A6 - 0x28]
000000A4 2051 movea.l A0, [A1]
000000A6 5488 addq.l A0, 2
000000A8 24D8 move.l [A2]+, [A0]+
000000AA 24D8 move.l [A2]+, [A0]+
000000AC 486E FFF8 pea.l [A6 - 0x8]
000000B0 4EAD 0472 jsr [A5 + 0x472 /* export_138 */]
000000B4 584F addq.w A7, 4
000000B6 486E FFE8 pea.l [A6 - 0x18]
000000BA 4267 clr.w -[A7]
000000BC 4267 clr.w -[A7]
000000BE 3F3C 0001 move.w -[A7], 0x1
000000C2 3F3C 0001 move.w -[A7], 0x1
000000C6 A8A7 syscall SetRect
000000C8 486E FFE8 pea.l [A6 - 0x18]
000000CC 4EAD 0472 jsr [A5 + 0x472 /* export_138 */]
000000D0 584F addq.w A7, 4
000000D2 45EE FFE0 lea.l A2, [A6 - 0x20]
000000D6 43EE FFE8 lea.l A1, [A6 - 0x18]
000000DA 24D9 move.l [A2]+, [A1]+
000000DC 24D9 move.l [A2]+, [A1]+
000000DE 45EE FFF0 lea.l A2, [A6 - 0x10]
000000E2 43EE FFF8 lea.l A1, [A6 - 0x8]
000000E6 24D9 move.l [A2]+, [A1]+
000000E8 24D9 move.l [A2]+, [A1]+
000000EA 486E FFE0 pea.l [A6 - 0x20]
000000EE 4EAD 046A jsr [A5 + 0x46A /* export_137 */]
000000F2 584F addq.w A7, 4
000000F4 486E FFF0 pea.l [A6 - 0x10]
000000F8 4EAD 046A jsr [A5 + 0x46A /* export_137 */]
000000FC 584F addq.w A7, 4
000000FE 3F3C 002D move.w -[A7], 0x2D /* '-' */
00000102 486E FFF0 pea.l [A6 - 0x10]
00000106 486E FFE0 pea.l [A6 - 0x20]
0000010A 4EAD 0462 jsr [A5 + 0x462 /* export_136 */]
0000010E 4FEF 000A lea.l A7, [A7 + 0xA]
00000112 2F2E FFD8 move.l -[A7], [A6 - 0x28]
00000116 486E FFF8 pea.l [A6 - 0x8]
0000011A A8F6 syscall DrawPicture
0000011C 4A6D D92C tst.w [A5 - 0x26D4]
00000120 670C beq +0xE /* 0000012E */
00000122 3F3C 2710 move.w -[A7], 0x2710
00000126 4EAD 03D2 jsr [A5 + 0x3D2 /* export_118 */]
0000012A 544F addq.w A7, 2
0000012C 6010 bra +0x12 /* 0000013E */
label0000012E:
0000012E 486E FFDC pea.l [A6 - 0x24]
00000132 2F3C 0000 00B4 move.l -[A7], 0xB4
00000138 4EAD 019A jsr [A5 + 0x19A /* export_47 */]
0000013C 504F addq.w A7, 8
label0000013E:
0000013E 486E FFF8 pea.l [A6 - 0x8]
00000142 486D F17E pea.l [A5 - 0xE82]
00000146 A8A5 syscall FillRect
00000148 3F3C 002D move.w -[A7], 0x2D /* '-' */
0000014C 486E FFE0 pea.l [A6 - 0x20]
00000150 486E FFF0 pea.l [A6 - 0x10]
00000154 4EAD 0462 jsr [A5 + 0x462 /* export_136 */]
00000158 4FEF 000A lea.l A7, [A7 + 0xA]
0000015C 2F2E FFD8 move.l -[A7], [A6 - 0x28]
00000160 A9A3 syscall ReleaseResource
00000162 3F3C 006C move.w -[A7], 0x6C /* 'l' */
00000166 4EAD 0232 jsr [A5 + 0x232 /* export_66 */]
0000016A 544F addq.w A7, 2
0000016C 2B40 F08C move.l [A5 - 0xF74], D0
00000170 2F2D F08C move.l -[A7], [A5 - 0xF74]
00000174 A86F syscall OpenPort
00000176 262D F08C move.l D3, [A5 - 0xF74]
0000017A 5483 addq.l D3, 2
0000017C 2B43 F058 move.l [A5 - 0xFA8], D3
00000180 246D F058 movea.l A2, [A5 - 0xFA8]
00000184 5C8A addq.l A2, 6
00000186 43ED F084 lea.l A1, [A5 - 0xF7C]
0000018A 24D9 move.l [A2]+, [A1]+
0000018C 24D9 move.l [A2]+, [A1]+
0000018E 246D F058 movea.l A2, [A5 - 0xFA8]
00000192 362A 0008 move.w D3, [A2 + 0x8]
00000196 976A 000C sub.w [A2 + 0xC], D3
0000019A 246D F058 movea.l A2, [A5 - 0xFA8]
0000019E 362A 0006 move.w D3, [A2 + 0x6]
000001A2 976A 000A sub.w [A2 + 0xA], D3
000001A6 246D F058 movea.l A2, [A5 - 0xFA8]
000001AA 426A 0008 clr.w [A2 + 0x8]
000001AE 426A 0006 clr.w [A2 + 0x6]
000001B2 246D F058 movea.l A2, [A5 - 0xFA8]
000001B6 362A 000C move.w D3, [A2 + 0xC]
000001BA D67C 000F add.w D3, 0xF
000001BE 48C3 ext.l D3
000001C0 87FC 0010 divs.w D3, 0x10
000001C4 3D43 FFD2 move.w [A6 - 0x2E], D3
000001C8 246D F058 movea.l A2, [A5 - 0xFA8]
000001CC 3D6A 000A FFD0 move.w [A6 - 0x30], [A2 + 0xA]
000001D2 246D F058 movea.l A2, [A5 - 0xFA8]
000001D6 362E FFD2 move.w D3, [A6 - 0x2E]
000001DA E343 asl D3.w, 1
000001DC 3543 0004 move.w [A2 + 0x4], D3
000001E0 246D F058 movea.l A2, [A5 - 0xFA8]
000001E4 2F0A move.l -[A7], A2
000001E6 246D F058 movea.l A2, [A5 - 0xFA8]
000001EA 362A 0004 move.w D3, [A2 + 0x4]
000001EE C6EE FFD0 mulu.w D3, [A6 - 0x30]
000001F2 3F03 move.w -[A7], D3
000001F4 4EAD 0232 jsr [A5 + 0x232 /* export_66 */]
000001F8 544F addq.w A7, 2
000001FA 245F movea.l A2, [A7]+
000001FC 2480 move.l [A2], D0
000001FE 45ED F05C lea.l A2, [A5 - 0xFA4]
00000202 226D F058 movea.l A1, [A5 - 0xFA8]
00000206 5C89 addq.l A1, 6
00000208 24D9 move.l [A2]+, [A1]+
0000020A 24D9 move.l [A2]+, [A1]+
0000020C 486D F05C pea.l [A5 - 0xFA4]
00000210 3F3C 0005 move.w -[A7], 0x5
00000214 3F3C 0005 move.w -[A7], 0x5
00000218 A8A9 syscall InsetRect
0000021A 2F2D F08C move.l -[A7], [A5 - 0xF74]
0000021E A873 syscall SetPort
00000220 3F3C 0004 move.w -[A7], 0x4
00000224 A887 syscall TextFont
00000226 3F3C 0009 move.w -[A7], 0x9 /* '\t' */
0000022A A88A syscall TextSize
0000022C 4267 clr.w -[A7]
0000022E A888 syscall TextFace
00000230 42A7 clr.l -[A7]
00000232 486D F05C pea.l [A5 - 0xFA4]
00000236 486D F05C pea.l [A5 - 0xFA4]
0000023A A9D2 syscall TENew
0000023C 201F move.l D0, [A7]+
0000023E 2B40 F064 move.l [A5 - 0xF9C], D0
00000242 2F2D F064 move.l -[A7], [A5 - 0xF9C]
00000246 4EAD 024A jsr [A5 + 0x24A /* export_69 */]
0000024A 584F addq.w A7, 4
0000024C 42A7 clr.l -[A7]
0000024E 2F3C 5445 5854 move.l -[A7], 0x54455854 /* 'TEXT' */
00000254 3F3C 0081 move.w -[A7], 0x81
00000258 A9A0 syscall GetResource
0000025A 201F move.l D0, [A7]+
0000025C 2D40 FFD4 move.l [A6 - 0x2C], D0
00000260 4A80 tst.l D0
00000262 6626 bne +0x28 /* 0000028A */
00000264 42A7 clr.l -[A7]
00000266 2F3C 5445 5854 move.l -[A7], 0x54455854 /* 'TEXT' */
0000026C 3F3C 0080 move.w -[A7], 0x80
00000270 A9A0 syscall GetResource
00000272 201F move.l D0, [A7]+
00000274 2D40 FFD4 move.l [A6 - 0x2C], D0
00000278 4A80 tst.l D0
0000027A 660E bne +0x10 /* 0000028A */
0000027C 487A 00CF pea.l [PC + 0xCF /* 0000034D, value 0x54686520 'The ', cstring "The Pharaoh game has been corru"... */]
00000280 4EAD 009A jsr [A5 + 0x9A /* export_15 */]
00000284 584F addq.w A7, 4
00000286 4EAD 0222 jsr [A5 + 0x222 /* export_64 */]
label0000028A:
0000028A 246D F064 movea.l A2, [A5 - 0xF9C]
0000028E 2252 movea.l A1, [A2]
00000290 236E FFD4 003E move.l [A1 + 0x3E], [A6 - 0x2C]
00000296 2F2D F064 move.l -[A7], [A5 - 0xF9C]
0000029A 4EAD 0252 jsr [A5 + 0x252 /* export_70 */]
0000029E 584F addq.w A7, 4
000002A0 2F2E FFD4 move.l -[A7], [A6 - 0x2C]
000002A4 4EAD 036A jsr [A5 + 0x36A /* export_105 */]
000002A8 584F addq.w A7, 4
000002AA 4A40 tst.w D0
000002AC 660E bne +0x10 /* 000002BC */
000002AE 487A 00C2 pea.l [PC + 0xC2 /* 00000372, value 0x54686520 'The ', cstring "The Pharaoh program file has be"... */]
000002B2 4EAD 009A jsr [A5 + 0x9A /* export_15 */]
000002B6 584F addq.w A7, 4
000002B8 4EAD 0222 jsr [A5 + 0x222 /* export_64 */]
label000002BC:
000002BC 2F2D F064 move.l -[A7], [A5 - 0xF9C]
000002C0 A9D0 syscall TECalText
000002C2 486D F05C pea.l [A5 - 0xFA4]
000002C6 A8A3 syscall EraseRect
000002C8 486D F05C pea.l [A5 - 0xFA4]
000002CC 2F2D F064 move.l -[A7], [A5 - 0xF9C]
000002D0 A9D3 syscall TEUpdate
000002D2 486D EFBC pea.l [A5 - 0x1044]
000002D6 A873 syscall SetPort
000002D8 45ED F068 lea.l A2, [A5 - 0xF98]
000002DC 43ED F05C lea.l A1, [A5 - 0xFA4]
000002E0 24D9 move.l [A2]+, [A1]+
000002E2 24D9 move.l [A2]+, [A1]+
000002E4 486D F068 pea.l [A5 - 0xF98]
000002E8 4EAD 0472 jsr [A5 + 0x472 /* export_138 */]
000002EC 584F addq.w A7, 4
000002EE 486D F070 pea.l [A5 - 0xF90]
000002F2 4267 clr.w -[A7]
000002F4 4267 clr.w -[A7]
000002F6 3F3C 0001 move.w -[A7], 0x1
000002FA 3F3C 0001 move.w -[A7], 0x1
000002FE A8A7 syscall SetRect
00000300 486D F070 pea.l [A5 - 0xF90]
00000304 4EAD 0472 jsr [A5 + 0x472 /* export_138 */]
00000308 584F addq.w A7, 4
0000030A 45ED F078 lea.l A2, [A5 - 0xF88]
0000030E 43ED F070 lea.l A1, [A5 - 0xF90]
00000312 24D9 move.l [A2]+, [A1]+
00000314 24D9 move.l [A2]+, [A1]+
00000316 42A7 clr.l -[A7]
00000318 A975 syscall TickCount
0000031A 201F move.l D0, [A7]+
0000031C 2B40 F080 move.l [A5 - 0xF80], D0
00000320 4267 clr.w -[A7]
00000322 3F3C FFFF move.w -[A7], 0xFFFF
00000326 4EAD 029A jsr [A5 + 0x29A /* export_79 */]
0000032A 584F addq.w A7, 4
0000032C 486D EFCC pea.l [A5 - 0x1034]
00000330 A928 syscall InvalRect
00000332 4CDF 0030 movem.l D4,D5, [A7]+
00000336 4E5E unlink A6
00000338 4E75 rts
0000033A 1143 6C69 move.b [A0 + 0x6C69], D3
0000033E 636B bls +0x6D /* 000003AB */
00000340 2074 6F20 436F movea.l A0, [A4 + 0x436F + D6 * 8]
00000346 6E74 bgt +0x76 /* 000003BC */
00000348 696E bvs +0x70 /* 000003B8 */
0000034A 7565 moveq.l D2, 0x65
0000034C 0054 6865 ori.w [A4], 0x6865 /* 'he' */
00000350 2050 movea.l A0, [A0]
00000352 6861 bvc +0x63 /* 000003B5 */
00000354 7261 moveq.l D1, 0x61
00000356 6F68 ble +0x6A /* 000003C0 */
00000358 2067 movea.l A0, -[A7]
0000035A 616D bsr +0x6F /* 000003C9 */
0000035C 6520 bcs +0x22 /* 0000037E */
0000035E 6861 bvc +0x63 /* 000003C1 */
00000360 7320 moveq.l D1, 0x20
00000362 6265 bhi +0x67 /* 000003C9 */
00000364 656E bcs +0x70 /* 000003D4 */
00000366 2063 movea.l A0, -[A3]
00000368 6F72 ble +0x74 /* 000003DC */
0000036A 7275 moveq.l D1, 0x75
0000036C 7074 moveq.l D0, 0x74
0000036E 6564 bcs +0x66 /* 000003D4 */
00000370 2E00 move.l D7, D0
00000372 5468 6520 addq.w [A0 + 0x6520], 2
00000376 5068 6172 addq.w [A0 + 0x6172], 8
0000037A 616F bsr +0x71 /* 000003EB */
0000037C 6820 bvc +0x22 /* 0000039E */
label0000037E:
0000037E 7072 moveq.l D0, 0x72
00000380 6F67 ble +0x69 /* 000003E9 */
00000382 7261 moveq.l D1, 0x61
00000384 6D20 blt +0x22 /* 000003A6 */
00000386 6669 bne +0x6B /* 000003F1 */
00000388 6C65 bge +0x67 /* 000003EF */
0000038A 2068 6173 movea.l A0, [A0 + 0x6173]
0000038E 2062 movea.l A0, -[A2]
00000390 6565 bcs +0x67 /* 000003F7 */
00000392 6E20 bgt +0x22 /* 000003B4 */
00000394 636F bls +0x71 /* 00000405 */
00000396 7272 moveq.l D1, 0x72
00000398 7570 moveq.l D2, 0x70
0000039A 7465 moveq.l D2, 0x65
0000039C 642E bcc +0x30 /* 000003CC */
label0000039E:
0000039E 2E00 move.l D7, D0
000003A0 4E56 0000 link A6, 0
000003A4 48E7 0810 movem.l -[A7], D4,A3
// begin alternate branch 000003A6-000003B4
label000003A6:
000003A6 0810 266E btst.b [A0], 0x6E /* 'n' */
000003AA 0008 382E ori.b A0, 0x2E /* '.' */
000003AE 0010 486D ori.b [A0], 0x6D /* 'm' */
000003B2 F132 .extension 0x132 <<F/4-5/0>> // unimplemented
// end alternate branch 000003A6-000003B4
label000003A6: // (misaligned)
000003A8 266E 0008 movea.l A3, [A6 + 0x8]
000003AC 382E 0010 move.w D4, [A6 + 0x10]
000003B0 486D F132 pea.l [A5 - 0xECE]
label000003B4:
000003B4 A851 syscall SetCursor
000003B6 4CDF 0810 movem.l D4,A3, [A7]+
// begin alternate branch 000003B8-000003BC
label000003B8:
000003B8 0810 4E5E btst.b [A0], 0x5E /* '^' */
// end alternate branch 000003B8-000003BC
label000003B8: // (misaligned)
000003BA 4E5E unlink A6
label000003BC:
000003BC 4E75 rts
000003BE 4E56 FFEC link A6, -0x0014
// begin alternate branch 000003C0-000003C2
label000003C0:
000003C0 FFEC .invalid <<F/7/7>>
// end alternate branch 000003C0-000003C2
label000003C0: // (misaligned)
000003C2 2F0B move.l -[A7], A3
000003C4 266E 0008 movea.l A3, [A6 + 0x8]
000003C8 42A7 clr.l -[A7]
000003CA A975 syscall TickCount
label000003CC:
000003CC 201F move.l D0, [A7]+
000003CE 90AD F080 sub.l D0, [A5 - 0xF80]
000003D2 2B40 F0B8 move.l [A5 - 0xF48], D0
// begin alternate branch 000003D4-000003DC
label000003D4:
000003D4 F0B8 262D .extension 0x0B8 <<F/2-3/0>> // unimplemented
000003D8 F0B8 D7AD .extension 0x0B8 <<F/2-3/0>> // unimplemented
// end alternate branch 000003D4-000003DC
label000003D4: // (misaligned)
000003D6 262D F0B8 move.l D3, [A5 - 0xF48]
000003DA D7AD F080 add.l [A5 - 0xF80], D3
// begin alternate branch 000003DC-000003E4
label000003DC:
000003DC F080 202D .extension 0x080 <<F/2-3/0>> // unimplemented
000003E0 F0B8 7202 .extension 0x0B8 <<F/2-3/0>> // unimplemented
// end alternate branch 000003DC-000003E4
label000003DC: // (misaligned)
000003DE 202D F0B8 move.l D0, [A5 - 0xF48]
000003E2 7202 moveq.l D1, 0x02
000003E4 4EAD 0212 jsr [A5 + 0x212 /* export_62 */]
000003E8 D1AD F0B8 add.l [A5 - 0xF48], D0
000003EC 302D EBE8 move.w D0, [A5 - 0x1418]
000003F0 6000 02AC bra +0x2AE /* 0000069E */
label000003F4:
000003F4 265F movea.l A3, [A7]+
000003F6 4E5E unlink A6
000003F8 4E75 rts
000003FA 42A7 clr.l -[A7]
000003FC A8D8 syscall NewRgn
000003FE 201F move.l D0, [A7]+
00000400 2D40 FFF4 move.l [A6 - 0xC], D0
00000404 45EE FFF8 lea.l A2, [A6 - 0x8]
00000408 43ED F078 lea.l A1, [A5 - 0xF88]
0000040C 24D9 move.l [A2]+, [A1]+
0000040E 24D9 move.l [A2]+, [A1]+
00000410 362D F078 move.w D3, [A5 - 0xF88]
00000414 966D F068 sub.w D3, [A5 - 0xF98]
00000418 48C3 ext.l D3
0000041A 242D F0B8 move.l D2, [A5 - 0xF48]
0000041E B483 cmp.l D2, D3
00000420 6C06 bge +0x8 /* 00000428 */
00000422 262D F0B8 move.l D3, [A5 - 0xF48]
00000426 600A bra +0xC /* 00000432 */
label00000428:
00000428 362D F078 move.w D3, [A5 - 0xF88]
0000042C 966D F068 sub.w D3, [A5 - 0xF98]
00000430 48C3 ext.l D3
label00000432:
00000432 976D F078 sub.w [A5 - 0xF88], D3
00000436 362D F06C move.w D3, [A5 - 0xF94]
0000043A 966D F07C sub.w D3, [A5 - 0xF84]
0000043E 48C3 ext.l D3
00000440 242D F0B8 move.l D2, [A5 - 0xF48]
00000444 B483 cmp.l D2, D3
00000446 6C06 bge +0x8 /* 0000044E */
00000448 262D F0B8 move.l D3, [A5 - 0xF48]
0000044C 600A bra +0xC /* 00000458 */
label0000044E:
0000044E 362D F06C move.w D3, [A5 - 0xF94]
00000452 966D F07C sub.w D3, [A5 - 0xF84]
00000456 48C3 ext.l D3
label00000458:
00000458 D76D F07C add.w [A5 - 0xF84], D3
0000045C 362D F06E move.w D3, [A5 - 0xF92]
00000460 966D F07E sub.w D3, [A5 - 0xF82]
00000464 48C3 ext.l D3
00000466 242D F0B8 move.l D2, [A5 - 0xF48]
0000046A B483 cmp.l D2, D3
0000046C 6C06 bge +0x8 /* 00000474 */
0000046E 262D F0B8 move.l D3, [A5 - 0xF48]
00000472 600A bra +0xC /* 0000047E */
label00000474:
00000474 362D F06E move.w D3, [A5 - 0xF92]
00000478 966D F07E sub.w D3, [A5 - 0xF82]
0000047C 48C3 ext.l D3
label0000047E:
0000047E D76D F07E add.w [A5 - 0xF82], D3
00000482 362D F07A move.w D3, [A5 - 0xF86]
00000486 966D F06A sub.w D3, [A5 - 0xF96]
0000048A 48C3 ext.l D3
0000048C 242D F0B8 move.l D2, [A5 - 0xF48]
00000490 B483 cmp.l D2, D3
00000492 6C06 bge +0x8 /* 0000049A */
00000494 262D F0B8 move.l D3, [A5 - 0xF48]
00000498 600A bra +0xC /* 000004A4 */
label0000049A:
0000049A 362D F07A move.w D3, [A5 - 0xF86]
0000049E 966D F06A sub.w D3, [A5 - 0xF96]
000004A2 48C3 ext.l D3
label000004A4:
000004A4 976D F07A sub.w [A5 - 0xF86], D3
000004A8 486D EFBC pea.l [A5 - 0x1044]
000004AC A873 syscall SetPort
000004AE A8DA syscall OpenRgn
000004B0 486D F078 pea.l [A5 - 0xF88]
000004B4 4EBA 0336 jsr [PC + 0x336 /* 000007EC */]
000004B8 584F addq.w A7, 4
000004BA 2F2E FFF4 move.l -[A7], [A6 - 0xC]
000004BE A8DB syscall CloseRgn
000004C0 2F2E FFF4 move.l -[A7], [A6 - 0xC]
000004C4 A927 syscall InvalRgn
000004C6 4267 clr.w -[A7]
000004C8 486D F078 pea.l [A5 - 0xF88]
000004CC 486D F068 pea.l [A5 - 0xF98]
000004D0 A8A6 syscall EqualRect
000004D2 101F move.b D0, [A7]+
000004D4 4A00 tst.b D0
000004D6 6704 beq +0x6 /* 000004DC */
000004D8 426D EBE8 clr.w [A5 - 0x1418]
label000004DC:
000004DC 2F2E FFF4 move.l -[A7], [A6 - 0xC]
000004E0 A8D9 syscall DisposRgn/DisposeRgn
000004E2 6000 01CA bra +0x1CC /* 000006AE */
000004E6 42A7 clr.l -[A7]
000004E8 A8D8 syscall NewRgn
000004EA 201F move.l D0, [A7]+
000004EC 2D40 FFF4 move.l [A6 - 0xC], D0
000004F0 486D EFBC pea.l [A5 - 0x1044]
000004F4 A873 syscall SetPort
000004F6 45EE FFEC lea.l A2, [A6 - 0x14]
000004FA 43ED F078 lea.l A1, [A5 - 0xF88]
000004FE 24D9 move.l [A2]+, [A1]+
00000500 24D9 move.l [A2]+, [A1]+
00000502 486E FFEC pea.l [A6 - 0x14]
00000506 3F3C FFFF move.w -[A7], 0xFFFF
0000050A 3F3C FFFF move.w -[A7], 0xFFFF
0000050E A8A9 syscall InsetRect
00000510 486E FFEC pea.l [A6 - 0x14]
00000514 A928 syscall InvalRect
00000516 362D F070 move.w D3, [A5 - 0xF90]
0000051A 966D F078 sub.w D3, [A5 - 0xF88]
0000051E 48C3 ext.l D3
00000520 242D F0B8 move.l D2, [A5 - 0xF48]
00000524 B483 cmp.l D2, D3
00000526 6C06 bge +0x8 /* 0000052E */
00000528 262D F0B8 move.l D3, [A5 - 0xF48]
0000052C 600A bra +0xC /* 00000538 */
label0000052E:
0000052E 362D F070 move.w D3, [A5 - 0xF90]
00000532 966D F078 sub.w D3, [A5 - 0xF88]
00000536 48C3 ext.l D3
label00000538:
00000538 D76D F078 add.w [A5 - 0xF88], D3
0000053C 362D F07C move.w D3, [A5 - 0xF84]
00000540 966D F074 sub.w D3, [A5 - 0xF8C]
00000544 48C3 ext.l D3
00000546 242D F0B8 move.l D2, [A5 - 0xF48]
0000054A B483 cmp.l D2, D3
0000054C 6C06 bge +0x8 /* 00000554 */
0000054E 262D F0B8 move.l D3, [A5 - 0xF48]
00000552 600A bra +0xC /* 0000055E */
label00000554:
00000554 362D F07C move.w D3, [A5 - 0xF84]
00000558 966D F074 sub.w D3, [A5 - 0xF8C]
0000055C 48C3 ext.l D3
label0000055E:
0000055E 976D F07C sub.w [A5 - 0xF84], D3
00000562 362D F07E move.w D3, [A5 - 0xF82]
00000566 966D F076 sub.w D3, [A5 - 0xF8A]
0000056A 48C3 ext.l D3
0000056C 242D F0B8 move.l D2, [A5 - 0xF48]
00000570 B483 cmp.l D2, D3
00000572 6C06 bge +0x8 /* 0000057A */
00000574 262D F0B8 move.l D3, [A5 - 0xF48]
00000578 600A bra +0xC /* 00000584 */
label0000057A:
0000057A 362D F07E move.w D3, [A5 - 0xF82]
0000057E 966D F076 sub.w D3, [A5 - 0xF8A]
00000582 48C3 ext.l D3
label00000584:
00000584 976D F07E sub.w [A5 - 0xF82], D3
00000588 362D F072 move.w D3, [A5 - 0xF8E]
0000058C 966D F07A sub.w D3, [A5 - 0xF86]
00000590 48C3 ext.l D3
00000592 242D F0B8 move.l D2, [A5 - 0xF48]
00000596 B483 cmp.l D2, D3
00000598 6C06 bge +0x8 /* 000005A0 */
0000059A 262D F0B8 move.l D3, [A5 - 0xF48]
0000059E 600A bra +0xC /* 000005AA */
label000005A0:
000005A0 362D F072 move.w D3, [A5 - 0xF8E]
000005A4 966D F07A sub.w D3, [A5 - 0xF86]
000005A8 48C3 ext.l D3
label000005AA:
000005AA D76D F07A add.w [A5 - 0xF86], D3
000005AE A8DA syscall OpenRgn
000005B0 486D F078 pea.l [A5 - 0xF88]
000005B4 4EBA 0236 jsr [PC + 0x236 /* 000007EC */]
000005B8 584F addq.w A7, 4
000005BA 2F2E FFF4 move.l -[A7], [A6 - 0xC]
000005BE A8DB syscall CloseRgn
000005C0 2F2E FFF4 move.l -[A7], [A6 - 0xC]
000005C4 A929 syscall ValidRgn
000005C6 4267 clr.w -[A7]
000005C8 486D F078 pea.l [A5 - 0xF88]
000005CC 486D F070 pea.l [A5 - 0xF90]
000005D0 A8A6 syscall EqualRect
000005D2 101F move.b D0, [A7]+
000005D4 4A00 tst.b D0
000005D6 660E bne +0x10 /* 000005E6 */
000005D8 4267 clr.w -[A7]
000005DA 486D F078 pea.l [A5 - 0xF88]
000005DE A8AE syscall EmptyRect
000005E0 101F move.b D0, [A7]+
000005E2 4A00 tst.b D0
000005E4 6706 beq +0x8 /* 000005EC */
label000005E6:
000005E6 3B7C 0003 EBE8 move.w [A5 - 0x1418], 0x3
label000005EC:
000005EC 2F2E FFF4 move.l -[A7], [A6 - 0xC]
000005F0 A8D9 syscall DisposRgn/DisposeRgn
000005F2 6000 00BA bra +0xBC /* 000006AE */
000005F6 246D F064 movea.l A2, [A5 - 0xF9C]
000005FA 2252 movea.l A1, [A2]
000005FC 2F09 move.l -[A7], A1
000005FE 4EBA 00B2 jsr [PC + 0xB2 /* 000006B2 */]
00000602 225F movea.l A1, [A7]+
00000604 9151 sub.w [A1], D0
00000606 246D F064 movea.l A2, [A5 - 0xF9C]
0000060A 2252 movea.l A1, [A2]
0000060C 246D F064 movea.l A2, [A5 - 0xF9C]
00000610 2052 movea.l A0, [A2]
00000612 3629 0008 move.w D3, [A1 + 0x8]
00000616 9650 sub.w D3, [A0]
00000618 246D F064 movea.l A2, [A5 - 0xF9C]
0000061C 2252 movea.l A1, [A2]
0000061E 246D F064 movea.l A2, [A5 - 0xF9C]
00000622 2052 movea.l A0, [A2]
00000624 3429 0018 move.w D2, [A1 + 0x18]
00000628 C4E8 005E mulu.w D2, [A0 + 0x5E]
0000062C B642 cmp.w D3, D2
0000062E 6F08 ble +0xA /* 00000638 */
00000630 3B7C 0004 EBE8 move.w [A5 - 0x1418], 0x4
00000636 6012 bra +0x14 /* 0000064A */
label00000638:
00000638 3B7C 0001 EBE8 move.w [A5 - 0x1418], 0x1
0000063E 45ED F078 lea.l A2, [A5 - 0xF88]
00000642 43ED F070 lea.l A1, [A5 - 0xF90]
00000646 24D9 move.l [A2]+, [A1]+
00000648 24D9 move.l [A2]+, [A1]+
label0000064A:
0000064A 2F2D F08C move.l -[A7], [A5 - 0xF74]
0000064E A873 syscall SetPort
00000650 486D F05C pea.l [A5 - 0xFA4]
00000654 2F2D F064 move.l -[A7], [A5 - 0xF9C]
00000658 A9D3 syscall TEUpdate
0000065A 2F0B move.l -[A7], A3
0000065C A873 syscall SetPort
0000065E 604E bra +0x50 /* 000006AE */
00000660 2F2D F064 move.l -[A7], [A5 - 0xF9C]
00000664 A9CD syscall TEDispose
00000666 486D EFBC pea.l [A5 - 0x1044]
0000066A A92D syscall CloseWindow
0000066C 246D F058 movea.l A2, [A5 - 0xFA8]
00000670 2F12 move.l -[A7], [A2]
00000672 4EAD 023A jsr [A5 + 0x23A /* export_67 */]
00000676 584F addq.w A7, 4
00000678 2F2D F08C move.l -[A7], [A5 - 0xF74]
0000067C 4EAD 023A jsr [A5 + 0x23A /* export_67 */]
00000680 584F addq.w A7, 4
00000682 42A7 clr.l -[A7]
00000684 A924 syscall FrontWindow
00000686 201F move.l D0, [A7]+
00000688 2F00 move.l -[A7], D0
0000068A A873 syscall SetPort
0000068C 486D F12A pea.l [A5 - 0xED6]
00000690 A928 syscall InvalRect
00000692 601A bra +0x1C /* 000006AE */
00000694 FD48 .extension 0xD48 <<F/4-5/6>> // unimplemented
00000696 FD4E .extension 0xD4E <<F/4-5/6>> // unimplemented
00000698 FE3A FF4A .unknown 0xFE3A 0xFF4A (W = 7)
0000069C FFB4 .invalid <<F/6/7>>
label0000069E:
0000069E B07C 0005 cmp.w D0, 0x5
000006A2 640A bcc +0xC /* 000006AE */
000006A4 E340 asl D0.w, 1
000006A6 303B 00EC move.w D0, [PC + D0.w - 0x20]
000006AA 4EFB 0000 jmp [PC + D0.w]
label000006AE:
000006AE 6000 FD44 bra -0x2BA /* 000003F4 */
fn000006B2:
000006B2 4E56 0000 link A6, 0
000006B6 48E7 0F00 movem.l -[A7], D4,D5,D6,D7
000006BA 382D F060 move.w D4, [A5 - 0xFA0]
000006BE 986D F05C sub.w D4, [A5 - 0xFA4]
000006C2 246D F064 movea.l A2, [A5 - 0xF9C]
000006C6 2252 movea.l A1, [A2]
000006C8 3A29 0018 move.w D5, [A1 + 0x18]
000006CC 3C04 move.w D6, D4
000006CE 48C6 ext.l D6
000006D0 8DC5 divs.w D6, D5
000006D2 5346 subq.w D6, 1
000006D4 3E06 move.w D7, D6
000006D6 CEC5 mulu.w D7, D5
000006D8 3007 move.w D0, D7
000006DA 4CDF 00F0 movem.l D4,D5,D6,D7, [A7]+
000006DE 4E5E unlink A6
000006E0 4E75 rts
000006E2 4E56 0000 link A6, 0
000006E6 48E7 0818 movem.l -[A7], D4,A3,A4
000006EA 266E 0008 movea.l A3, [A6 + 0x8]
000006EE 286E 000C movea.l A4, [A6 + 0xC]
000006F2 382E 0010 move.w D4, [A6 + 0x10]
000006F6 B87C 0004 cmp.w D4, 0x4
000006FA 6606 bne +0x8 /* 00000702 */
000006FC 2F0B move.l -[A7], A3
000006FE A91F syscall SelectWindow
00000700 6012 bra +0x14 /* 00000714 */
label00000702:
00000702 B87C 0003 cmp.w D4, 0x3
00000706 660C bne +0xE /* 00000714 */
00000708 4A6D EBE8 tst.w [A5 - 0x1418]
0000070C 6606 bne +0x8 /* 00000714 */
0000070E 3B7C 0002 EBE8 move.w [A5 - 0x1418], 0x2
label00000714:
00000714 4CDF 1810 movem.l D4,A3,A4, [A7]+
00000718 4E5E unlink A6
0000071A 4E75 rts
0000071C 4E56 FFE8 link A6, -0x0018
00000720 48E7 0018 movem.l -[A7], A3,A4
00000724 266E 0008 movea.l A3, [A6 + 0x8]
00000728 286E 000C movea.l A4, [A6 + 0xC]
0000072C 2F0B move.l -[A7], A3
0000072E A873 syscall SetPort
00000730 2F0B move.l -[A7], A3
00000732 A922 syscall BeginUpdate
00000734 0C6D 0005 EBE8 cmpi.w [A5 - 0x1418], 0x5
0000073A 6614 bne +0x16 /* 00000750 */
0000073C 486D EFCC pea.l [A5 - 0x1034]
00000740 486D F17E pea.l [A5 - 0xE82]
00000744 A8A5 syscall FillRect
00000746 3B7C 0001 EBE8 move.w [A5 - 0x1418], 0x1
0000074C 6000 0092 bra +0x94 /* 000007E0 */
label00000750:
00000750 0C6D 0001 EBE8 cmpi.w [A5 - 0x1418], 0x1
00000756 6706 beq +0x8 /* 0000075E */
00000758 4A6D EBE8 tst.w [A5 - 0x1418]
0000075C 6678 bne +0x7A /* 000007D6 */
label0000075E:
0000075E 486E FFE8 pea.l [A6 - 0x18]
00000762 4267 clr.w -[A7]
00000764 4267 clr.w -[A7]
00000766 A880 syscall SetPt
00000768 486E FFE8 pea.l [A6 - 0x18]
0000076C A870 syscall LocalToGlobal
0000076E 42A7 clr.l -[A7]
00000770 A8D8 syscall NewRgn
00000772 201F move.l D0, [A7]+
00000774 2D40 FFEC move.l [A6 - 0x14], D0
00000778 2F2B 0018 move.l -[A7], [A3 + 0x18]
0000077C 2F2E FFEC move.l -[A7], [A6 - 0x14]
00000780 A8DC syscall CopyRgn
00000782 2F2E FFEC move.l -[A7], [A6 - 0x14]
00000786 3F2E FFEA move.w -[A7], [A6 - 0x16]
0000078A 3F2E FFE8 move.w -[A7], [A6 - 0x18]
0000078E A8E0 syscall OffsetRgn/OfsetRgn
00000790 45EE FFF8 lea.l A2, [A6 - 0x8]
00000794 226B 0018 movea.l A1, [A3 + 0x18]
00000798 2051 movea.l A0, [A1]
0000079A 5488 addq.l A0, 2
0000079C 24D8 move.l [A2]+, [A0]+
0000079E 24D8 move.l [A2]+, [A0]+
000007A0 45EE FFF0 lea.l A2, [A6 - 0x10]
000007A4 43EE FFF8 lea.l A1, [A6 - 0x8]
000007A8 24D9 move.l [A2]+, [A1]+
000007AA 24D9 move.l [A2]+, [A1]+
000007AC 486E FFF0 pea.l [A6 - 0x10]
000007B0 4EAD 046A jsr [A5 + 0x46A /* export_137 */]
000007B4 584F addq.w A7, 4
000007B6 2F2D F058 move.l -[A7], [A5 - 0xFA8]
000007BA 486D F124 pea.l [A5 - 0xEDC]
000007BE 486E FFF8 pea.l [A6 - 0x8]
000007C2 486E FFF0 pea.l [A6 - 0x10]
000007C6 4267 clr.w -[A7]
000007C8 2F2E FFEC move.l -[A7], [A6 - 0x14]
000007CC A8EC syscall CopyBits
000007CE 2F2E FFEC move.l -[A7], [A6 - 0x14]
000007D2 A8D9 syscall DisposRgn/DisposeRgn
000007D4 600A bra +0xC /* 000007E0 */
label000007D6:
000007D6 486D EFCC pea.l [A5 - 0x1034]
000007DA 486D F17E pea.l [A5 - 0xE82]
000007DE A8A5 syscall FillRect
label000007E0:
000007E0 2F0B move.l -[A7], A3
000007E2 A923 syscall EndUpdate
000007E4 4CDF 1800 movem.l A3,A4, [A7]+
000007E8 4E5E unlink A6
000007EA 4E75 rts
fn000007EC:
000007EC 4E56 0000 link A6, 0
000007F0 2F2E 0008 move.l -[A7], [A6 + 0x8]
000007F4 3F3C 0019 move.w -[A7], 0x19
000007F8 3F3C 0019 move.w -[A7], 0x19
000007FC A8B0 syscall FrameRoundRect
000007FE 4E5E unlink A6
00000800 4E75 rts
export_105:
00000802 4E56 FFEC link A6, -0x0014
00000806 2F0B move.l -[A7], A3
00000808 266E 0008 movea.l A3, [A6 + 0x8]
0000080C 2F0B move.l -[A7], A3
0000080E 4EAD 024A jsr [A5 + 0x24A /* export_69 */]
00000812 584F addq.w A7, 4
00000814 2F0B move.l -[A7], A3
00000816 4EAD 0192 jsr [A5 + 0x192 /* export_46 */]
0000081A 584F addq.w A7, 4
0000081C 5980 subq.l D0, 4
0000081E 3D40 FFF0 move.w [A6 - 0x10], D0
00000822 362E FFF0 move.w D3, [A6 - 0x10]
00000826 48C3 ext.l D3
00000828 D693 add.l D3, [A3]
0000082A 2D43 FFEC move.l [A6 - 0x14], D3
0000082E 246E FFEC movea.l A2, [A6 - 0x14]
00000832 2D52 FFF6 move.l [A6 - 0xA], [A2]
00000836 262E FFF6 move.l D3, [A6 - 0xA]
0000083A 4683 not.l D3
0000083C 2D43 FFFA move.l [A6 - 0x6], D3
00000840 422E FFFE clr.b [A6 - 0x2]
00000844 3F3C 0004 move.w -[A7], 0x4
00000848 486E FFFA pea.l [A6 - 0x6]
0000084C 3F2E FFF0 move.w -[A7], [A6 - 0x10]
00000850 2F13 move.l -[A7], [A3]
00000852 4EAD 047A jsr [A5 + 0x47A /* export_139 */]
00000856 4FEF 000C lea.l A7, [A7 + 0xC]
0000085A 3F2E FFF0 move.w -[A7], [A6 - 0x10]
0000085E 2F13 move.l -[A7], [A3]
00000860 4EAD 0482 jsr [A5 + 0x482 /* export_140 */]
00000864 5C4F addq.w A7, 6
00000866 2D40 FFF2 move.l [A6 - 0xE], D0
0000086A 262E FFF6 move.l D3, [A6 - 0xA]
0000086E 4683 not.l D3
00000870 242E FFF2 move.l D2, [A6 - 0xE]
00000874 B483 cmp.l D2, D3
00000876 6606 bne +0x8 /* 0000087E */
00000878 426D EBEA clr.w [A5 - 0x1416]
0000087C 6012 bra +0x14 /* 00000890 */
label0000087E:
0000087E 262E FFF2 move.l D3, [A6 - 0xE]
00000882 B6AE FFF6 cmp.l D3, [A6 - 0xA]
00000886 6708 beq +0xA /* 00000890 */
00000888 7000 moveq.l D0, 0x00
label0000088A:
0000088A 265F movea.l A3, [A7]+
0000088C 4E5E unlink A6
0000088E 4E75 rts
label00000890:
00000890 2F0B move.l -[A7], A3
00000892 4EAD 0252 jsr [A5 + 0x252 /* export_70 */]
00000896 584F addq.w A7, 4
00000898 362E FFF0 move.w D3, [A6 - 0x10]
0000089C 48C3 ext.l D3
0000089E 2F03 move.l -[A7], D3
000008A0 2F0B move.l -[A7], A3
000008A2 4EAD 0262 jsr [A5 + 0x262 /* export_72 */]
000008A6 504F addq.w A7, 8
000008A8 7001 moveq.l D0, 0x01
000008AA 60DE bra -0x20 /* 0000088A */